約 94,206 件
https://w.atwiki.jp/hibikibicycle/pages/3.html
Under the Groove of "響き" since 2006 総合トップ 響き サイト ├ 響きLinks ├ 響きblog ├ BAR WORLD ├ Cigar? ├ Malt? ├ ライブラリー(書籍・CD・DVD) ├ Beat?/獣の身体 ├ 自転車大好き! ├ 今日のtepu └ wikiTIPS 掲示板 メールフォーム 更新履歴 取得中です。
https://w.atwiki.jp/mishakuji/pages/44.html
日野岳 供水峠から北に行くか、ユウレイ峠から南に行くと在る山岳。 日野岳から北に行ったところにパノラマ岩という場所がある。 パノラマ岩については、下に記載。 峠位置 伏見区? コース所在地 伏見区~宇治市 距離 路面距離(計算値) 標高 373m 高低差 平均勾配 スタート 南側 供水峠北側 ユウレイ峠 ゴール 積み石の場所 地図 Yahoo!地図多分この辺 ルート地図 山頂地点。 供水峠から 道が少しあいまい。 基本は、落ち葉の堆積がそれなりにあるシングルトラック。 猪が掘り返していて荒れている。 ユウレイ峠へ(下り) 途中で道がはっきりと別れているところがある。 パノラマ岩を経由する登山道としてのメインルートと、パノラマ岩を迂回するルート、おそらく炭山方面に降りていくであろう道。 進路方向から、これが、左、真ん中、右という感じ、だった気がするが、一度に3分岐していたかどうか忘れた(多分近くでそうなってたと思う)。 この分岐からパノラマ岩までの下りは、横ががけになっていて、道も細く高所恐怖症には、非常に怖いことになっている。 しばらく進むと、道に張り出すようにあるパノラマ岩と呼ばれている場所に出る(横は崖)。 パノラマ岩を越えて道なりにしばらく進むとユウレイ峠に出てゴール。 登坂走行コース 供水峠から 登坂未走行コース ユウレイ峠から 山頂地点にある看板の1つ。 373mらしい。 パノラマ岩からの景色。 標高はわからないが350mあるかどうかということを考えれば、絶景といえると思う。 岩自体は撮るのを忘れた。岩には、道しるべの看板も在る。 携帯のカメラで撮ったのでがっかりな感じ。 景色は1枚では収まらないが、これもこのときはまったく確認できなかったので、3枚取ったうちの1枚だけ表示しておく。 いいカメラがほしくなる。 パノラマ岩について 日野岳山頂から道なりに北西にしばらく行くとあります(分岐路は左)。 探す必要はありませんし、日野岳からだとくだりになっていますが、それも心配する必要はありません。 高所恐怖症の人はそれなりの覚悟をしたほうがいいです。 我慢すれば、いい景色が見られます。 パノラマ岩は、細い道をさえぎるようにあるので、自転車を持っていれば、担いで乗り越えなければなりません。 トライアルのテクニックがある人の中には、自転車から降りずに乗り越えられる人もいると思います。 無理だと思う人は、パノラマ岩を迂回するルートを取るといいと思います。 迂回ルートはおそらくオフロードバイクが通れる道なので、自転車を押しながらでもいけると思いますが、テープなどの道しるべがあるのかどうかは不明です。
https://w.atwiki.jp/naianakikaku/pages/2011.html
「ぅあー!また取り逃がしたー!;」 ストラウルへの道中、太陽は星たちと同じく、ヴァイスを見失ってしまっていた。 折角手柄をとるためのチャンスだったためになお愕然とし、かつ疲労していた。 「最悪っ…もうなんでこんなことばっかり続くかね…ん?」 ぶつぶつといいながら携帯をひらくと、留守電に一件。 登録されてない数字だったが、スピーカーからは佑の声が聞こえてきた。 遅くなる、という旨だったがどうも声がかすれて聞き取りづらい。 自分以上に疲労しているようにも感じられた。 「…。」 どうする。一度太陽は自問した。 知らない番号から佑の声。一瞬誘拐も考えたが、それは頭から振り落とした。 佑の家には佑と太陽しか今はいない。誘拐してもメリットがないのだから。 となると、残る行動は一つしかあるまい。 「…帰るか、家に。」 自分もいつもよりかなり遅くなってしまった。 佑を待たせるわけにはいかない。そう考え直し、彼は歩き出した。 ――ぽつっ。 「つめてっ!」 不意に顔を襲ったものに太陽は思わず顔をしかめる。 空を見上げれば、曇天。時期が早いが、夕立か何かだろうか。 しまった、今日は傘を持ち合わせてない。 彼は走り出した。濡れて風邪でも引いたら元も子もあるまい。 それに、何かを感じてしまったのだ。 今しがた振りだした、雨に。 なんだか、触れるのでさえも気持ち悪い雨だ。 某時刻、見逃した刑事より 日が完全に沈んだ頃。雨は滝のごとく降り注いでいた。
https://w.atwiki.jp/mangaka/pages/5725.html
並木橋通りアオバ自転車店をお気に入りに追加 並木橋通りアオバ自転車店のリンク #blogsearch2 Amazon.co.jp ウィジェット 並木橋通りアオバ自転車店のキャッシュ 使い方 サイト名 URL 並木橋通りアオバ自転車店の報道 gnewプラグインエラー「並木橋通りアオバ自転車店」は見つからないか、接続エラーです。 並木橋通りアオバ自転車店とは 並木橋通りアオバ自転車店の36%は愛で出来ています。並木橋通りアオバ自転車店の29%は時間で出来ています。並木橋通りアオバ自転車店の16%は勢いで出来ています。並木橋通りアオバ自転車店の6%は鉛で出来ています。並木橋通りアオバ自転車店の6%はマイナスイオンで出来ています。並木橋通りアオバ自転車店の4%は保存料で出来ています。並木橋通りアオバ自転車店の2%は純金で出来ています。並木橋通りアオバ自転車店の1%は犠牲で出来ています。 並木橋通りアオバ自転車店@ウィキペディア 並木橋通りアオバ自転車店 楽天売れ筋ランキング レディースファッション・靴 メンズファッション・靴 バッグ・小物・ブランド雑貨 インナー・下着・ナイトウエア ジュエリー・腕時計 食品 スイーツ 水・ソフトドリンク ビール・洋酒 日本酒・焼酎 パソコン・周辺機器 家電・AV・カメラ インテリア・寝具・収納 キッチン・日用品雑貨・文具 ダイエット・健康 医薬品・コンタクト・介護 美容・コスメ・香水 スポーツ・アウトドア 花・ガーデン・DIY おもちゃ・ホビー・ゲーム CD・DVD・楽器 車用品・バイク用品 ペット・ペットグッズ キッズ・ベビー・マタニティ 本・雑誌・コミック ゴルフ総合 掲示板 名前(HN) カキコミ すべてのコメントを見る ページ先頭へ 並木橋通りアオバ自転車店 このページについて このページは並木橋通りアオバ自転車店のインターネット上の情報を集めたリンク集のようなものです。ブックマークしておけば、日々更新される並木橋通りアオバ自転車店に関連する最新情報にアクセスすることができます。 情報収集はプログラムで行っているため、名前が同じであるが異なるカテゴリーの情報が掲載される場合があります。ご了承ください。 リンク先の内容を保証するものではありません。ご自身の責任でクリックしてください。
https://w.atwiki.jp/wikikimura/
JR根岸線の時刻表へようこそ。 駅名 上り 下り 横浜駅 時刻表 時刻表 桜木町駅 時刻表 時刻表 関内駅 時刻表 時刻表 石川町駅 時刻表 時刻表 山手駅 時刻表 時刻表 根岸駅 時刻表 時刻表 磯子駅 時刻表 時刻表 新杉田駅 時刻表 時刻表 洋光台駅 時刻表 時刻表 港南台駅 時刻表 時刻表 本郷台駅 時刻表 時刻表 大船駅 時刻表 時刻表
https://w.atwiki.jp/tkurabud/pages/24.html
名前欄に (キャラクター名) コメント欄に (レベル 所属クラブ名) を書き込み 投稿 ボタンを 押してください なお、書き込み作業簡略化のためこの書き込みをコピペしますね^^ 予選はなるべく同一クラブ員が同じレースにならないようにしますので 多少のレベ差は発生すると思いますが、ご了承ください^^ 記入例)Lv40 自転車操業 -- 逃げ回る男 (2009-02-23 18 09 00) Lv53 鷹 -- 杜仲茶 (2009-02-23 19 12 22) Lv49 迫撃 -- 億万長者 (2009-02-23 22 13 03) Lv47 mistral -- ももんが (2009-02-28 12 12 03) LV46 2ZIGEN -- Rio (2009-02-23 23 29 27) Lv46-perfume -- FLASH7 (2009-02-26 13 15 14) LV46 ★酒気帯運転★ -- たけ (2009-02-26 23 17 48) LV46 -intel- -- 刺身 (2009-02-25 19 39 15) Lv44 迫撃 -- わしや!! (2009-02-23 22 13 03) Lv43 鷹 -- マサユキ (2009-02-23 18 50 33) Lv42 鷹 -- ぴざ (2009-02-24 02 19 25) Lv42 迫撃 -- nicotine (2009-02-23 22 26 58) Lv42 D-live-R -- オキストロ (2009-02-28 07 34 47) Lv41 D-live-R -- グリザ (2009-02-27 20 10 23) Lv41 -- 無所属 -- xxSIDxx (2009-02-23 22 20 12) Lv41 無所属 -- ちゅーまっは (2009-02-23 22 55 44) Lv41 夢想転生 -- nonos (2009-02-23 23 42 23) Lv40 2ZIGEN -- クルス (2009-02-23 23 32 09) Lv39 無所属 -- ファル (2009-02-27 22 11 35) LV36 ★酒気帯運転★ -- かいち (2009-02-25 09 01 30) Lv34 Fantax -- チャミー (2009-02-24 23 09 44) Lv31 迫撃 -- okikei (2009-02-23 22 14 02) LV30 2ZIGEN -- 変態紳士 (2009-02-24 23 06 57) Lv29 無所属 -- 蹴球魂 (2009-02-24 22 44 11) Lv28 無所属 -- 虎っち (2009-02-27 22 10 34) Lv28 【爆走スランプ】 -- Fセンサー (2009-02-24 21 41 36) Lv27 無所属 -- 長門有希 (2009-02-28 11 52 00) 逃げまわるsいつか一緒に大会やりましょw Lv25 無所属 -- 肉の (2009-02-27 01 15 53) Lv25 迫撃 -- 最速パワー (2009-02-23 23 15 12) Lv23 無所属 -- おっさん (2009-02-28 09 02 11) Lv22 無所属 -- ククレカレー (2009-02-27 13 26 23) Lv22 ★酒気帯運転★ -- 森の妖精♂ビリー (2009-02-24 22 49 12) Lv22 自転車操業 -- 寝不足さん (2009-02-28 11 24 40) Lv15 無所属 -- どんでんでんどん (2009-02-28 12 45 58) Lv1 無所属 -- 歪み (2009-02-28 12 45 58) 参加者は必ず祭りの流れを確認しておいてください^^ 参加受付終了しました^^
https://w.atwiki.jp/tkurabud/pages/33.html
トランスピーネタも尽きてきたので、私(億)からの強引な展開~~~ 一服タイムと銘打ち、連想ゲームでいろんなものをご紹介^^ まずはクラブ名『自転車操業』から 愛車のご紹介・。・(展開が強引過ぎる・・・・) エスケープR3 ん~安くてロードバイク気分が味わえますv ロードに乗ってる方に怒られるかな>< 追記:先日、知人に14万円ほどするロードバイクを試乗させていただきました。 さすがに違う! 軽快だ~~ いいな・・・・シクシク;; 同じく自転車から 熱い漫画のご紹介・。・ シャカリキ! ん~熱いね~ 追伸:映画の方をこのたび見ましたが、『どうなのこれ?・・・・・』 個人的な感想でした・・・・ 漫画つながりでもう一つ・。・ カウンタック ん~スーパーカーブーム世代には永遠のあこがれ! ☆~ レース間の空腹には クラブ☆ドライブ日和☆マスター おばQさんからの情報・。・ ポテトもち ん~3件ほど回りましたが、まだ味わえて無い>< 食べて~~~ぃ! H22.1.25 とうとうポテトもちを発見しました~~w 『なるほど!!これはハマるかもw』 お試しあれ~~~♪ 同僚からの情報・。・ チープな味が癖になる? 辛 ん~微妙w 好きなタバコ・。・ cool プチッとメンソール ブーーーースト ん~330円 30円が気になるので実際は違うタバコ吸ってます>< 使ってるパット Xbox360タイプ Xbox360タイプのパットは左右人差し指のボタン感覚が気持ちいい~ 表現が難しいな>< 地デジ対応には@@ 地デジチューナー さすがイオンさん ¥4,980なり~やること凄い! 性能:必要最低限・・そらそうだ^^ 追伸:購入後、同じメーカーのチューナーがあることを知る・・・・ テレビの電源、音声コントロールがリモコンに付いている・・・・ 約1,800円差・・・・こっちの方がいいかも・・・・後悔>< 追追伸:価格を変更したらしく¥4,750- 差額の230円を現金書留で送って来ました^^ 行き詰まった時にはこれだね! CM画像1 CM中の一節 『 わらったりぃ ないたりぃ おこったりぃ さけんだりぃ まいにち いろいろ あるから たのしいのさ(ふわりぃ) 』 う~~ん深い! 深いな! CM画像2 すごい良いCMだ~心に響く!! 作った人の感性、才能をほんの少しでも分けてほしいよ・。・; CM画像3 new 最近気になりませんか? こんなのどう?的な情報ありましたら教えてください^^ 名前 コメント すべてのコメントを見る
https://w.atwiki.jp/seiken_binary/pages/43.html
//アドレス(h),セクション名,バイト数/ビット指定,ステップ(h),データ個数,進数表記,最小値(h)|最大値(h)/ビットフィルタ(h),セル幅,解説テキスト,IDNファイル/IDリスト 7E2FFA,曜日,,,1,0,,1605,7日=1週間,0 マナの祝日|1 ルナの日|2 サラマンダーの日|3 ウンディーネの日|4 ドリアードの日|5 ジンの日|6 ノームの日 7E2FFB,時刻,,,1,0,,1200,15時の次は0時に戻る(16時間=1日)\n5時~12時が昼(ウィスプの刻)、13時~4時が夜(シェイドの刻),0 0時(シェイド)|1 1時(シェイド)|2 2時(シェイド)|3 3時(シェイド)|4 4時(シェイド)|5 5時(ウィスプ)|6 6時(ウィスプ)|7 7時(ウィスプ)|8 8時(ウィスプ)|9 9時(ウィスプ)|A 10時(ウィスプ)|B 11時(ウィスプ)|C 12時(ウィスプ)|D 13時(シェイド)|E 14時(シェイド)|F 15時(シェイド) 7E2FFC,分,,,1,10,,600,ゲーム内時刻(分) 31分の次は0分に戻る(32分=1時間), 7F00C6,プレイ時間,4,,1,10,,900,単位は1/60秒。数値を216000で割れば時間が出る, [[@wikiへ http //kam.jp" META HTTP-EQUIV="Refresh" CONTENT="0; URL=http //esthe.pink.sh/r/]]
https://w.atwiki.jp/mishakuji/pages/210.html
ユウレイ峠 日野岳の北、一言寺の東、炭山集落奥の西、醍醐山の南に在る峠。 日野岳や、醍醐山方面からだと、のぼりではなく下りになる。 分岐路が多い。 2009/11/28 炭山側のスタート付近の1つ目の丸太橋が壊れていた。 川を渡ることは可能。 峠位置 伏見区 コース所在地 伏見区~宇治市 距離 一言寺裏側 1.67km炭山側 789m 路面距離(計算値) 一言寺裏側1.71km炭山側 802m 標高 301m 高低差 一言寺裏側 250m炭山側 82m 平均勾配 一言寺裏側 15%炭山側 10.4% スタート 多数あり ゴール 峠位置 地図 Yahoo!地図多分この辺 ルート地図 峠付近(西側?伏見側を撮影)。 コンクリートの台座?がある。 奥に行くと醍醐、手前に行くと炭山側、右に行くと醍醐山、左に行くと日野岳。 一言寺裏手 地図を見ると、これが伏見側からの唯一のルートに見える。 自転車で登るような道ではなく、トレッキングシューズ履いて登山する道。 金属製の橋を渡ってから、鉄塔の下に出るまでが特にひどい。 鉄塔を越えた後は、勾配もずっとましになり、多少乗れるようになる。 牛馬の道に合流してからは自転車に乗って移動でき、道なりに登ればユウレイ峠に到達できる。 スタート→未舗装路→竹藪→ST→橋→ST→鉄塔→ST→牛馬の道→ゴール(ユウレイ峠) 鉄塔までたどり着いたら帰るのはもったいない。 交通量は無が、もしかしたらトライアル車がいるかもしれない。 醍醐山麓付近(炭山側) 未舗装路の途中にあるガードレールつきの橋の横にSTの入り口が在る。 このあたりなら、入り口にこだわらずともどこからでもスタートできる。 多分地図で確認できる川沿いに在る破線がそれ。 前半は、小川にかかった丸太で組んだ橋を何度も渡りながら進む。 後半は結構自転車に乗って登れるが、峠付近は厳しい。 テクニックと脚力しだいで足を付かずに登ることが出来ると思う。 基本的に交通量は無いが、もしかしたらオフロードバイクがいるかもしれない。 醍醐山周辺(伏見側) 竹林やらから~牛馬の道~ユウレイ峠 少なくとも下りはこの道が一番良いと思う。 なだらかなSTがひたすら続く。 途中軽く道が崩落しているところや、小さな沢がある。 森との境界に分岐点がある。 鉄塔があるほうは麓へ続いている。 森に入ると牛馬の道。 鉄塔の反対の道は醍醐山の麓(府道782号線)。 日野岳~ユウレイ峠 基本的に下り。 そこそこ自転車に乗ったまま下れる。 パノラマ岩を通るルートと、迂回するルートが在る。 ST。 醍醐山~ユウレイ峠 逆方向にしか走ったことは無いが、ST+DTという感じ。 登坂走行ルート 一言寺裏手?の竹やぶから 炭山側の醍醐山麓付近から 日野岳~ユウレイ峠(上りではないが) 登坂未走行ルート それ以外 一言寺裏手のスタート地点。 裏手といっても、寺は竹やぶの向こう側にあるのでまともに見えない。 スタート→未舗装路→竹藪→山道ときて少し行くとある。 この左にも道があり、竹やぶの中の別の道と通じてるものと思われる。 先にも道はあるが、右の橋を渡った。 道なりに登ると、鉄塔の下に出る。 鉄塔から森に入りしばらく行くと牛馬の道に合流する。 写真はユウレイ峠よりの牛馬の道から撮影したもので、右が牛馬の道の続きで、左が今まで登ってきた道。 鉄塔からここまでは、金属の橋から鉄塔までより、ずいぶん楽。 途中で分岐路があるので、左(まっすぐ山に向かう側)に進む。 この写真からユウレイ峠までは、ほぼ自転車に乗って走れる。 牛馬の道をしばらく行くとある分岐点。 右はおそらく供水峠付近に通じている(多分途中で鉄塔と牛馬の道の間にある分岐から伸びた道ともつながっている)。 幽霊峠の右側にある松と、その根元付近にある地図。 この松の向かい側に日野岳への道がある。 長坂峠から入っていったトライアルバイクのタイヤ痕は牛馬の道に続いていた。 上の写真の写っている、峠にある地図。 どの方面に何があるか、ということが確認できる(詳しくはない)。 峠にある小さな札。 日野岳から降りてくる道の横の木についている。 この写真ではわかりづらいが、サドルの奥辺りに、炭山方面へのSTがある。 左の道は上醍醐方面へのST。 写真では確認できないが、この右には日野岳へのSTが(2本)ある。 炭山方面から峠方向を撮影。 本当に山の中にある峠と言う感じ。 炭山側のST入り口。 左にある橋の先の道はカーブしていたと思う。 写真では、左に行くと炭山の集落に、右に行くと醍醐山に向かうことになる。 近くにわかりづらいがSTの入り口が在るが、どこに通じているのかもわからない。 以降は、牛馬の道を下って行った先の大きな分岐路から。 森から出てすぐにある分岐点(ユウレイ峠側から撮影)。 左に鉄塔があり、右はSTが続いている。 先程の分岐炉を左に行った先の鉄塔。 写真の中の鉄塔の左足の奥に先程の分岐路付近が見える。 撮影位置はこれから降りていく道辺り。 ここから勾配が急になる。 鉄塔から主線ぽいSTを進むと、別のSTに行き当たる。 撮影位置から自転車までの間の道は崩落している。 崩落した道の下から。 写真ではいまいちわかりづらい。 行き当たったSTを右に進むとこんな場所に出る。 中央の盛り上がったところから→奥に、溝沿いに道が続いていて、しばらく行くと府道782に出る。 左奥に進むとすぐに府道782に出られる。 行き当たったSTを左に進むと、舗装路に出る。下って開いたゲートを抜けるとここに出る。 そのまま下ると旧奈良街道に出る。
https://w.atwiki.jp/sampleisbest/pages/252.html
開発環境 Microsoft Visual C# 2010 Express (SP1) 実行環境 Microsoft Windows XP Home Edition (SP3) プロジェクトの種類 Windows Game (4.0) プロジェクト名 AstroSim3 参考 Planet Earth Texture Maps Game1.cs /* * プロジェクトのプロパティ * [XNA Game Studio]タブ * Use HiDef to access the complete API */ using System; using Microsoft.Xna.Framework; using Microsoft.Xna.Framework.Graphics; using Microsoft.Xna.Framework.Input; namespace AstroSim3 { class Game1 Game { GraphicsDeviceManager graphics; SpriteBatch sprite; SpriteFont font; Effect effect; VertexBuffer vertexBuffer; Texture2D texture; KeyboardState kStateOld = new KeyboardState(); // fps int fpsSec = -1; int fpsDraw = 0; int fpsCount = 0; const double solarYear = 365.24219; // 太陽年(day) 365d5h48m45s const double anomalisticYear = 365.259643; // 近点年(day) 365d6h13m53.1552s const double earthRotationPerSec = (2 * Math.PI) / 86400; // 地球が1秒間に回転する角度 const double e = 0.01671022; // 離心率(Orbital eccentricity) readonly double K = Math.Sqrt((1 + e) / (1 - e)); // ケプラー方程式の定数 const double epsilon = 1.0e-14; DateTime dt = DateTime.UtcNow; int tz = 0; readonly string[] tzName = { "UTC", "JST-9" }; int cursor = 0; readonly int[] cursorPos = { 0, 5, 8, 11, 14, 15, 17 }; readonly int[] cursorLen = { 4, 2, 2, 2, 1, 1, 3 }; int repeatFrame = 0; double MJD; // 修正ユリウス日 double MJD_date; double MJD_time; double T; // 2000/1/1 12 00(UT)からのユリウス世紀(36525日) double obliquity; // 黄道傾斜角 double eclipticLon; // 黄径 public Game1() { graphics = new GraphicsDeviceManager(this); graphics.PreferredBackBufferWidth = 1280; graphics.PreferredBackBufferHeight = 720; Content.RootDirectory = "Content"; IsMouseVisible = true; } protected override void LoadContent() { sprite = new SpriteBatch(GraphicsDevice); font = Content.Load SpriteFont ("SpriteFont1"); texture = Content.Load Texture2D ("earthmap1k"); effect = Content.Load Effect ("Effect1"); effect.Parameters["WorldMap"].SetValue(texture); effect.Parameters["revision"].SetValue( (float)Math.Sin((0.533 / 2 + (35 * 60 + 8) / 3600.0) * Math.PI / 180)); VertexPositionTexture[] vertices = new VertexPositionTexture[4]; vertices[0] = new VertexPositionTexture(new Vector3(-1, 1, 0), new Vector2(0, 0)); vertices[1] = new VertexPositionTexture(new Vector3(1, 1, 0), new Vector2(1, 0)); vertices[2] = new VertexPositionTexture(new Vector3(-1, -1, 0), new Vector2(0, 1)); vertices[3] = new VertexPositionTexture(new Vector3(1, -1, 0), new Vector2(1, 1)); vertexBuffer = new VertexBuffer(GraphicsDevice, typeof(VertexPositionTexture), 4, BufferUsage.WriteOnly); vertexBuffer.SetData(vertices); CalcParameter(); base.LoadContent(); } void CalcParameter() { // 修正ユリウス日 int y = dt.Year; int m = dt.Month; int d = dt.Day; if (m 3) { y--; m += 12; } MJD_date = (int)(365.25 * y) + (y / 400) - (y / 100) + (int)(30.59 * (m - 2)) + d - 678912; MJD_time = (dt.Hour * 60 + dt.Minute) / 1440.0; MJD = MJD_date + MJD_time; // 黄道傾斜角 T = (MJD - 51544.5) / 36525; obliquity = (84381.406 - 46.836769 * T - 0.00059 * T * T + 0.001813 * T * T * T) / 3600; // 平均近点角(概算)近日点から次の近日点までの角度 double Ma = ModAngle((2 * Math.PI) * ((MJD / anomalisticYear - 0.1242853) % 1.0)); double E; double Ta; // 真近点角 KeplersEquation(Ma, out E, out Ta); // 春分点(vernal equinox)の真近点角 double MJDv = ((int)(MJD / solarYear - 0.3399541) + 0.3399541) * solarYear; double Mv = ModAngle((2 * Math.PI) * ((MJDv / anomalisticYear - 0.1242853) % 1.0)); double Tv; KeplersEquation(Mv, out E, out Tv); // 黄径(概算)春分点から次の春分点までの角度 eclipticLon = ModAngle(Ta - Tv); // 楕円効果と傾斜効果 int ellipseEffect = (int)Math.Round(Ma / earthRotationPerSec - Ta / earthRotationPerSec); int obliquityEffect = CalcObliquityEffect(obliquity, eclipticLon); int equationOfTime = ellipseEffect + obliquityEffect; // 均時差 float transit = (43200 - equationOfTime) / 86400.0f; // 南中時 // 天球上の太陽軌道の高さと半径 double solarDecl = Math.Sin(eclipticLon) * obliquity * Math.PI / 180; // 太陽の赤緯 double solarAlt = Math.Sin(solarDecl); double solarRad = Math.Cos(solarDecl); effect.Parameters["MJD_time"].SetValue((float)MJD_time); effect.Parameters["solarDecl"].SetValue((float)solarDecl); effect.Parameters["solarAlt"].SetValue((float)solarAlt); effect.Parameters["solarRad"].SetValue((float)solarRad); effect.Parameters["transit"].SetValue(transit); } double ModAngle(double angle) { while (angle = -Math.PI) angle += (2 * Math.PI); while (Math.PI angle) angle -= (2 * Math.PI); return angle; } // 傾斜効果の計算 int CalcObliquityEffect(double obliquity, double eclipticLon) { // 地球を基準とした太陽の公転 double x = Math.Cos(eclipticLon); double r = Math.Sin(eclipticLon); double y = Math.Cos(obliquity * Math.PI / 180) * r; double celestialEquator = Math.Atan2(y, x); // 天の赤道上の角度 return (int)Math.Round(eclipticLon / earthRotationPerSec - celestialEquator / earthRotationPerSec); } // 漸化式によりケプラー方程式を解く // M 平均近点角(mean anomaly) // E 離心近点角(Eccentric anomaly) // T 真近点角(true anomaly) void KeplersEquation(double M, out double E, out double T) { double E0 = M; // 初項 for (int i = 0; ; ) { i++; E = M + e * Math.Sin(E0); if ((E0 - epsilon E) (E E0 + epsilon)) { break; } if (10 = i) { Console.WriteLine(string.Format("計算打ち切り M={0} E={1}", M, E)); break; } E0 = E; } T = Math.Atan(K * Math.Tan(E / 2)) * 2; } protected override void Update(GameTime gameTime) { int delta = 0; KeyboardState kState = Keyboard.GetState(); if (kState.IsKeyDown(Keys.Escape)) Exit(); if (kState.IsKeyDown(Keys.Left) kStateOld.IsKeyUp(Keys.Left)) { cursor = (cursor + 6) % 7; } if (kState.IsKeyDown(Keys.Right) kStateOld.IsKeyUp(Keys.Right)) { cursor = (cursor + 1) % 7; } if (kState.IsKeyDown(Keys.Up)) delta = 1; if (kState.IsKeyDown(Keys.Down)) delta = -1; kStateOld = kState; if (delta == 0) { repeatFrame = 0; } else { if (--repeatFrame = 0) { switch (cursor) { case 0 dt = dt.AddYears(delta); break; case 1 dt = dt.AddMonths(delta); break; case 2 dt = dt.AddDays(delta); break; case 3 dt = dt.AddHours(delta); break; case 4 dt = dt.AddMinutes(delta * 10); break; case 5 dt = dt.AddMinutes(delta); break; case 6 tz = (tz + 1) % 2; break; } if (cursor != 6) { CalcParameter(); } repeatFrame = (repeatFrame == 0) ? 6 30; } } base.Update(gameTime); } protected override void Draw(GameTime gameTime) { GraphicsDevice.Clear(Color.CornflowerBlue); GraphicsDevice.SamplerStates[0] = SamplerState.LinearClamp; foreach (EffectPass pass in effect.CurrentTechnique.Passes) { pass.Apply(); GraphicsDevice.SetVertexBuffer(vertexBuffer); GraphicsDevice.DrawPrimitives(PrimitiveType.TriangleStrip, 0, 2); } // fps fpsDraw++; if (gameTime.TotalGameTime.Seconds != fpsSec) { fpsCount = fpsDraw; fpsDraw = 0; fpsSec = gameTime.TotalGameTime.Seconds; } sprite.Begin(); string text = new string( , cursorPos[cursor]) + new string( _ , cursorLen[cursor]); sprite.DrawString(font, text, new Vector2(0, 0), Color.Red); text = string.Format("{0} {1}", dt.AddHours(tz * 9).ToString("yyyy/MM/dd HH mm"), tzName[tz]); sprite.DrawString(font, text, new Vector2(0, 0), Color.Red); text = string.Format("fps={0} MJD={1 f4}", fpsCount, MJD); sprite.DrawString(font, text, new Vector2(0, 20), Color.Red); text = string.Format("eLon={0 f6} T={1 f7} obliq={2 f3}", eclipticLon, T, obliquity); sprite.DrawString(font, text, new Vector2(0, 40), Color.Red); sprite.End(); base.Draw(gameTime); } } } Effect1.cs texture WorldMap; float MJD_time; // 修正ユリウス日の時刻 float solarDecl; // 太陽の赤緯 float solarAlt; // 天球上の太陽軌道の高さ float solarRad; // 天球上の太陽軌道の半径 float transit; // 南中時 float revision; // 太陽の視角(0.533deg)と大気差(35m8s)による昼の長さの補正 sampler TextureSampler = sampler_state { texture = WorldMap ; mipfilter = linear; minfilter = linear; magfilter = linear; }; struct VertexShaderInput { float4 Position POSITION0; float2 TexCoord TEXCOORD0; }; struct VertexShaderOutput { float4 Position POSITION0; float2 TexCoord TEXCOORD0; }; VertexShaderOutput VertexShaderFunction(VertexShaderInput input) { VertexShaderOutput output; output.Position = input.Position; output.TexCoord = input.TexCoord; return output; } // input.TexCoord.x 経度 Left=0.0 - Right=1.0 // input.TexCoord.y 緯度 Top=0.0 - Bottom=1.0 float4 PixelShaderFunction(VertexShaderOutput input) COLOR0 { float lat = radians(90 - input.TexCoord.y * 180); // 緯度 Top=90 - Bottom=-90 float lon = -180 + input.TexCoord.x * 360; // 経度 Left=-180 - Right=180 // 黄緯線 if (abs(lat - solarDecl) 0.0025) return float4(1, 1, 0, 1); // 赤道 if (abs(lat) 0.0025) return float4(1, 0, 0, 1); // ローカル時刻 float localtime = MJD_time + lon / 360; localtime = frac(localtime); if (localtime 0.001) return float4(1, 1, 1, 1); // 00 00 // テクスチャサンプリング float4 output; output = tex2D(TextureSampler, input.TexCoord); // 天球上の太陽軌道と地平面の交点=日出・日没 float ra = sin(lat) * revision; float rx = cos(lat) * revision; float x = ((solarAlt + ra) * -tan(lat) - rx) / solarRad; if (x = -1) // 白夜 { return output; } if (1 = x) // 極夜 { output.rgb *= 0.5; return output; } float halfDaytime = degrees(acos(x)) / 360; // 日出・日没時刻(南中時-半分の昼の長さ) float rising = transit - halfDaytime; float setting = transit + halfDaytime; if (localtime = rising || setting = localtime) { output.rgb *= 0.5; } return output; } technique Technique1 { pass Pass1 { VertexShader = compile vs_3_0 VertexShaderFunction(); PixelShader = compile ps_3_0 PixelShaderFunction(); } }